      integer nmaxpart	
      parameter (nmaxpart=1000000)	      